home *** CD-ROM | disk | FTP | other *** search
/ Otherware / Otherware_1_SB_Development.iso / mac / misc / medical / mendelge.cpt / MendelGenetics / MENDELIAN GENETICS I / card_63437.txt < prev    next >
Text File  |  1989-06-13  |  5KB  |  196 lines

  1. -- card: 63437 from stack: in
  2. -- bmap block id: 64045
  3. -- flags: 0000
  4. -- background id: 2665
  5. -- name: 
  6.  
  7.  
  8. -- part 1 (field)
  9. -- low flags: 00
  10. -- high flags: 0002
  11. -- rect: left=265 top=23 right=47 bottom=508
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 0
  15. -- font id: 128
  16. -- text size: 10
  17. -- style flags: 256
  18. -- line height: 13
  19. -- part name: f1
  20.  
  21.  
  22. -- part 2 (field)
  23. -- low flags: 00
  24. -- high flags: 0002
  25. -- rect: left=334 top=168 right=193 bottom=398
  26. -- title width / last selected line: 0
  27. -- icon id / first selected line: 0 / 0
  28. -- text alignment: 0
  29. -- font id: 128
  30. -- text size: 9
  31. -- style flags: 0
  32. -- line height: 12
  33. -- part name: f2
  34.  
  35.  
  36. -- part 3 (field)
  37. -- low flags: 00
  38. -- high flags: 0002
  39. -- rect: left=414 top=169 right=194 bottom=478
  40. -- title width / last selected line: 0
  41. -- icon id / first selected line: 0 / 0
  42. -- text alignment: 0
  43. -- font id: 128
  44. -- text size: 9
  45. -- style flags: 0
  46. -- line height: 12
  47. -- part name: f3
  48.  
  49.  
  50. -- part 4 (field)
  51. -- low flags: 00
  52. -- high flags: 0002
  53. -- rect: left=335 top=201 right=226 bottom=399
  54. -- title width / last selected line: 0
  55. -- icon id / first selected line: 0 / 0
  56. -- text alignment: 0
  57. -- font id: 128
  58. -- text size: 9
  59. -- style flags: 0
  60. -- line height: 12
  61. -- part name: f4
  62.  
  63.  
  64. -- part 5 (field)
  65. -- low flags: 00
  66. -- high flags: 0002
  67. -- rect: left=414 top=200 right=225 bottom=478
  68. -- title width / last selected line: 0
  69. -- icon id / first selected line: 0 / 0
  70. -- text alignment: 0
  71. -- font id: 128
  72. -- text size: 9
  73. -- style flags: 0
  74. -- line height: 12
  75. -- part name: f5
  76.  
  77.  
  78. -- part 6 (field)
  79. -- low flags: 00
  80. -- high flags: 0002
  81. -- rect: left=415 top=248 right=273 bottom=479
  82. -- title width / last selected line: 0
  83. -- icon id / first selected line: 0 / 0
  84. -- text alignment: 0
  85. -- font id: 128
  86. -- text size: 10
  87. -- style flags: 256
  88. -- line height: 13
  89. -- part name: f6
  90.  
  91.  
  92. -- part 8 (button)
  93. -- low flags: 00
  94. -- high flags: 8003
  95. -- rect: left=442 top=129 right=151 bottom=500
  96. -- title width / last selected line: 0
  97. -- icon id / first selected line: 0 / 0
  98. -- text alignment: 1
  99. -- font id: 0
  100. -- text size: 12
  101. -- style flags: 0
  102. -- line height: 16
  103. -- part name: ENTER
  104. ----- HyperTalk script -----
  105. on mouseUp
  106.   delete line 1 of card field f2
  107.   delete line 1 of card field f3
  108.   delete line 1 of card field f4
  109.   delete line 1 of card field f5
  110.   get the location of card field f2
  111.   click at it
  112. end mouseUp
  113.  
  114.  
  115.  
  116. -- part 9 (button)
  117. -- low flags: 00
  118. -- high flags: 8003
  119. -- rect: left=295 top=251 right=273 bottom=395
  120. -- title width / last selected line: 0
  121. -- icon id / first selected line: 0 / 0
  122. -- text alignment: 1
  123. -- font id: 0
  124. -- text size: 12
  125. -- style flags: 0
  126. -- line height: 16
  127. -- part name: RUN
  128. ----- HyperTalk script -----
  129. on mouseUp
  130.   global denom
  131.   global sum
  132.   set numberFormat to "0.0000"
  133.   put the value of ((card field f2 + card field f3 + card field f4 + card field f5)) into sum
  134.   put the value of (((card field f2 + card field f3) * (card field f2 + card field f4) * (card field f4 + card field f5) * ( card field f3 + card field f5))) into denom
  135.   set numberFormat to "000.00"
  136.   put the value of ((((abs(( card field f2 * card field f5) - (card field f3 * card field f4)) - ( 0.5 * sum))^2 ) * sum)/ denom) into card field f6
  137. end mouseUp
  138.  
  139.  
  140.  
  141. -- part 10 (button)
  142. -- low flags: 00
  143. -- high flags: 8003
  144. -- rect: left=144 top=314 right=336 bottom=244
  145. -- title width / last selected line: 0
  146. -- icon id / first selected line: 0 / 0
  147. -- text alignment: 1
  148. -- font id: 0
  149. -- text size: 12
  150. -- style flags: 0
  151. -- line height: 16
  152. -- part name: TWIN STUDIES
  153. ----- HyperTalk script -----
  154. on mouseUp
  155.   go to card id 60673
  156. end mouseUp
  157.  
  158.  
  159.  
  160.  
  161. -- part contents for background part 1
  162. ----- text -----
  163. CONTINGENCY CHI-SQUARE
  164.  
  165. -- part contents for background part 2
  166. ----- text -----
  167. At times it is desirable to compare two sets of data taken at different times under different conditions. Whenever this is done, one must concern oneself with whether the observed results are dependent 
  168. (contingent upon) or independent of the different conditions under which they were observed. In genetics, this boils down to how independent the observations were of environmental conditions. To test this relationship, a contingency chi-square is employed. In this set-up two different exercises are examined. Enter the data for each trial in the appropriate boxes and click on the RUN button. The program will compute the contingency chi-square. If it is less than 3.84, then the data classes are independent of external influences or forces. In other words, they are independent of experimental conditions including the influences of diffrent genotypes. In the twin studies, if the chi-square is more than 3.84, the effect  is controlled, at least in part, by a genetic component.The degree to which the genetic component is able to effect a particular phenotype is a function of the environment. Therefore, some genetic influences will produce very large chi square values when they are able to exert their influence unopposed over the phenotype. If the environment modifies such influence, it will reduce the chi-square accordingly.  
  169.  
  170. -- part contents for card part 6
  171. ----- text -----
  172. 053.51
  173.  
  174. -- part contents for card part 1
  175. ----- text -----
  176. Rickets
  177.  
  178. -- part contents for background part 8
  179. ----- text -----
  180. 49
  181.  
  182. -- part contents for card part 2
  183. ----- text -----
  184. 52
  185.  
  186. -- part contents for card part 3
  187. ----- text -----
  188. 8
  189.  
  190. -- part contents for card part 4
  191. ----- text -----
  192. 16
  193.  
  194. -- part contents for card part 5
  195. ----- text -----
  196. 58